Developer CD Series 2000 May: Tool Chest/Dev.CD May 00 TC.toast/pc/tool chest/quicktime/quicktime tools/quicktime xcmds/qtpict stack/cards.xml

Text File | 1992-06-12 | 36.0 KB | 1,052 lines

card_4967.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<card>
    <id>4967</id>
    <filler1>0</filler1>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <owner>2806</owner>
    <link rel="stylesheet" type="text/css" href="stylesheet_3177.css" />
    <part>
        <id>1</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>4</left>
            <top>338</top>
            <right>100</right>
            <bottom>359</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Pick A Folder</name>
        <script>on mouseUp
answer file "Pick any File in the Desired Folder:" of type "MooV"
if it is not empty then put ExtractPathName(it) into bg field filename
end mouseup</script>
    </part>
    <part>
        <id>2</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>109</left>
            <top>337</top>
            <right>197</right>
            <bottom>358</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Doit</name>
        <script>on mouseUp
put ExtractPathName (field fileName) into volName
put getFileNames(volName,false,"MooV") into movies
put topLeft of btn here into pt
put min (6, the number of lines in movies) into numMovies

repeat with i = 1 to numMovies
QTPict DisplayPict,volName & line i of movies,pt,file,thumbnail
add 85 to item 1 of pt
end repeat

end mouseUp</script>
    </part>
    <part>
        <id>4</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>24</left>
            <top>123</top>
            <right>69</right>
            <bottom>159</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <true /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>here</name>
        <script>on mouseDown
put the clickLoc into myClick
put the loc of me into origLoc
put item 1 of origLoc into origX
put item 2 of origLoc into origY
put item 1 of myClick into clickX
put item 2 of myClick into clickY
repeat while the mouse is down
set loc of me to Min(Max(0,origX - (clickX - the mouseH)),width of this card),¬
Min(Max(0, origY - (clickY - the mouseV)), height of this card)
end repeat
end mouseDown</script>
    </part>
    <part>
        <id>5</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>246</left>
            <top>276</top>
            <right>555</right>
            <bottom>344</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>help text</name>
        <script>on mouseUp
hide me
end mouseUp</script>
    </part>
    <content>
        <layer>background</layer>
        <id>4</id>
        <text>Display Movie Thumbnails</text>
    </content>
    <content>
        <layer>background</layer>
        <id>2</id>
        <text>Your Volume:Your Folder:</text>
    </content>
    <content>
        <layer>card</layer>
        <id>5</id>
        <text>Choose a folder with movie files in it by clicking Pick a Folder and selecting any file in the folder. When you click Doit, thumbnails of the first six movie files is displayed.</text>
    </content>
    <name>Display Movie Thumbnails</name>
    <script>on primeCard
send primeCard to this bg
put "Your Volume:Your Folder:" into bg field fileName
end primeCard</script>
</card>


card_3931.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<card>
    <id>3931</id>
    <filler1>0</filler1>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <owner>2806</owner>
    <link rel="stylesheet" type="text/css" href="stylesheet_3177.css" />
    <part>
        <id>1</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>101</left>
            <top>338</top>
            <right>192</right>
            <bottom>357</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>File Size</name>
        <script>on mouseUp
QTPict "FileSize",field fileName
get the result
if "Error" is in it then
answer it
else
answer ExtractFileName(field fileName) && "is" &&it && "bytes in length"
end if
end mouseUp</script>
    </part>
    <part>
        <id>2</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>201</left>
            <top>337</top>
            <right>299</right>
            <bottom>357</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Screen Depth</name>
        <script>on mouseUp
QTPict GetScreenDepth
answer "The current screen's depth is" && the result && "bits"
end mouseUp</script>
    </part>
    <content>
        <layer>background</layer>
        <id>2</id>
        <text>Your Volume:Your Folder:Your File</text>
    </content>
    <content>
        <layer>background</layer>
        <id>4</id>
        <text>FileSize & ScreenDepth</text>
    </content>
    <name>FileSize & ScreenDepth</name>
    <script></script>
</card>


card_3802.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<card>
    <id>3802</id>
    <filler1>0</filler1>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <owner>2806</owner>
    <link rel="stylesheet" type="text/css" href="stylesheet_3177.css" />
    <part>
        <id>1</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>103</left>
            <top>337</top>
            <right>203</right>
            <bottom>358</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Compress Pict</name>
        <script>on mouseUp

QTPict CompressPict,field fileName,file,cd fld pictureQuality,cd field cType

get the result
if "Error" is not in it then
put field fileName & ".q" & cd fld pictureQuality into wName
Picture wName,file,document,false

put ExtractFileName(wName) into wName
set loc of window wName to the topLeft of btn here
show window wName
else
answer it
end if
end mouseUp</script>
    </part>
    <part>
        <id>2</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>401</left>
            <top>334</top>
            <right>414</right>
            <bottom>346</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>18001</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name></name>
        <script>on mouseDown
if cd field pictureQuality < 1023 then
add 1 to cd field pictureQuality
else
beep
end if
global startTicks
put the ticks into startTicks
end mouseDown

on mouseStillDown
global startTicks
if the ticks - startTicks > 10 then
put the Ticks-6 into startTicks
if cd field pictureQuality < 1013 then
add 10 to cd field pictureQuality
else
put 1023 into cd field pictureQuality
end if
end if
end mouseStillDOwn</script>
    </part>
    <part>
        <id>5</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>401</left>
            <top>347</top>
            <right>413</right>
            <bottom>359</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>9052</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name></name>
        <script>on mouseDown
if cd field pictureQuality > 1 then
subtract 1 from cd field pictureQuality
else
beep
end if
global startTicks
put the ticks into startTicks
end mouseDown

on mouseStillDown
global startTicks
if the ticks - startTicks > 10 then
put the Ticks-6 into startTicks
if cd field pictureQuality > 11 then
subtract 10 from cd field pictureQuality
else
put 1 into cd field pictureQuality
end if
end if
end mouseStillDOwn

</script>
    </part>
    <part>
        <id>6</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>416</left>
            <top>339</top>
            <right>464</right>
            <bottom>356</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>right</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>bold</textStyle>
        <textHeight>16</textHeight>
        <name>PictureQuality</name>
        <script>on closeField
if there is a window "live video" then
set codecType of window "live video" to me
get the result
if it is not empty then put it
end if
end closeField</script>
    </part>
    <part>
        <id>7</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>212</left>
            <top>339</top>
            <right>330</right>
            <bottom>355</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <name>Codec: Video</name>
        <script>on mouseDown
QTPict codecNames
put the result into menuItems
if "Error" is not in menuItems then
get PopUpMenu (menuItems, 0, bottom of me, left of me+1)
if it > 0 then
QTPict codecTypes
put the result into cTypes
put item it of cTypes into cd field cType
set name of me to "Codec:" && line it of menuItems
end if
else
put menuItems
end if
end mouseDown</script>
    </part>
    <part>
        <id>8</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>331</left>
            <top>339</top>
            <right>378</right>
            <bottom>355</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <textHeight>13</textHeight>
        <name>cType</name>
        <script></script>
    </part>
    <part>
        <id>9</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>388</left>
            <top>318</top>
            <right>460</right>
            <bottom>332</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Quality:</name>
        <script></script>
    </part>
    <part>
        <id>10</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>91</left>
            <top>61</top>
            <right>136</right>
            <bottom>97</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <true /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>here</name>
        <script>on mouseDown
put the clickLoc into myClick
put the loc of me into origLoc
put item 1 of origLoc into origX
put item 2 of origLoc into origY
put item 1 of myClick into clickX
put item 2 of myClick into clickY
repeat while the mouse is down
set loc of me to Min(Max(0,origX - (clickX - the mouseH)),width of this card),¬
Min(Max(0, origY - (clickY - the mouseV)), height of this card)
end repeat
end mouseDown</script>
    </part>
    <content>
        <layer>background</layer>
        <id>2</id>
        <text>Your Volume:Your Folder:Your File</text>
    </content>
    <content>
        <layer>card</layer>
        <id>6</id>
        <text>512</text>
    </content>
    <content>
        <layer>card</layer>
        <id>8</id>
        <text>rpza</text>
    </content>
    <content>
        <layer>background</layer>
        <id>4</id>
        <text>CompressPict</text>
    </content>
    <name>CompressPict</name>
    <script></script>
</card>


card_3005.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<card>
    <id>3005</id>
    <filler1>0</filler1>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <owner>2806</owner>
    <link rel="stylesheet" type="text/css" href="stylesheet_3177.css" />
    <part>
        <id>3</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>99</left>
            <top>338</top>
            <right>186</right>
            <bottom>357</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Show Pict</name>
        <script>on mouseUp
if the hilite of btn thumbnail then
put "Thumbnail" into showThumb
else
put empty into showThumb
end if

put empty into doClip
put empty into clipRect

if the hilite of btn "topLeft of btn here" then
put topLeft of btn here into theLoc
else
put rect of btn there into theLoc
if the hilite of btn "clip it" then
put "ClipTo" into doClip
put the rect of btn "clip" into clipRect
end if
end if

if the hilite of btn "bounds Only" then
QTPict PictBounds,field fileName,theLoc,file,showThumb,doClip,clipRect
else
QTPict DisplayPict,field fileName,theLoc,file,showThumb,doClip,clipRect
end if
get the result
if "Error" is in it then answer it
else put it into cd field bounds
end mouseUp</script>
    </part>
    <part>
        <id>4</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>100</left>
            <top>49</top>
            <right>145</right>
            <bottom>85</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <true /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>here</name>
        <script>on mouseDown
put the clickLoc into myClick
put the loc of me into origLoc
put item 1 of origLoc into origX
put item 2 of origLoc into origY
put item 1 of myClick into clickX
put item 2 of myClick into clickY
repeat while the mouse is down
set loc of me to Min(Max(0,origX - (clickX - the mouseH)),width of this card),¬
Min(Max(0, origY - (clickY - the mouseV)), height of this card)
end repeat
end mouseDown</script>
    </part>
    <part>
        <id>5</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>196</left>
            <top>341</top>
            <right>292</right>
            <bottom>355</bottom>
        </rect>
        <style>checkbox</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Thumbnail</name>
        <script></script>
    </part>
    <part>
        <id>6</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>242</left>
            <top>64</top>
            <right>471</right>
            <bottom>285</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>there</name>
        <script>on mouseDown

put the clickLoc into origPt
put the rect of me into origRect
put origRect into newRect
put origRect into myRect
put origRect into growRect
put item 3 of growRect-18 into item 1 of growRect
put item 4 of growRect-18 into item 2 of growRect

if origPt is within growRect then
put item 3 of growRect - item 1 of origPt into slopX
put item 4 of growRect - item 2 of origPt into slopY

repeat while the mouse is down
get the mouseLoc

put the left of me + 30 - slopX into minLimX
put the top of me + 30 - slopY into minLimY
put width of card window - slopX into maxLimX
put top of bg btn "Pick a file" - slopY into maxLimY

if item 1 of it < minLimX then put minLimX into item 1 of it
if item 2 of it < minLimY then put minLimY into item 2 of it
if item 1 of it > maxLimX then put maxLimX into item 1 of it
if item 2 of it > maxLimY then put maxLimY into item 2 of it

put item 1 of it + slopX into item 3 of newRect
put item 2 of it + slopY into item 4 of newRect
set the rect of me to newRect
end repeat
else
put item 1 of origPt - the left of me into minLimX
put item 2 of origPt - the top of me into minLimY
put width of card window - width of me + minLimX into maxLimX
put top of bg btn "Pick a file" - height of me + minLimY into maxLimY

repeat while the mouse is down
get the mouseLoc

if item 1 of it < minLimX then put minLimX into item 1 of it
if item 2 of it < minLimY then put minLimY into item 2 of it
if item 1 of it > maxLimX then put maxLimX into item 1 of it
if item 2 of it > maxLimY then put maxLimY into item 2 of it

put item 1 of it - item 1 of origPt into slopX
put item 2 of it - item 2 of origPt into slopY

put origRect into myRect
add slopX to item 1 of myRect
add slopX to item 3 of myRect
add slopY to item 2 of myRect
add slopY to item 4 of myRect

set the rect of me to myRect
end repeat

put myRect into newRect
end if

set the rect of me to newRect
end mouseDown

</script>
    </part>
    <part>
        <id>8</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>308</left>
            <top>321</top>
            <right>416</right>
            <bottom>336</bottom>
        </rect>
        <style>radiobutton</style>
        <showName> <true /> </showName>
        <highlight> <true /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <name>topLeft of btn here</name>
        <script>on mouseUp
set hilite of btn "rect of btn there" to false
set hilite of me to true
set visible of btn "clip it" to false
end mouseUp</script>
    </part>
    <part>
        <id>9</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>308</left>
            <top>335</top>
            <right>416</right>
            <bottom>350</bottom>
        </rect>
        <style>radiobutton</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <name>rect of btn there</name>
        <script>on mouseUp
set hilite of me to true
set hilite of btn "topLeft of btn here" to false
set visible of btn "clip it" to true
end mouseUp</script>
    </part>
    <part>
        <id>10</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>283</left>
            <top>199</top>
            <right>432</right>
            <bottom>265</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>clip</name>
        <script>on mouseDown

put the clickLoc into origPt
put the rect of me into origRect
put origRect into newRect
put origRect into myRect
put origRect into growRect
put item 3 of growRect-18 into item 1 of growRect
put item 4 of growRect-18 into item 2 of growRect

if origPt is within growRect then
put item 3 of growRect - item 1 of origPt into slopX
put item 4 of growRect - item 2 of origPt into slopY

repeat while the mouse is down
get the mouseLoc

put the left of me + 30 - slopX into minLimX
put the top of me + 30 - slopY into minLimY
put width of card window - slopX into maxLimX
put top of bg btn "Pick a file" - slopY into maxLimY

if item 1 of it < minLimX then put minLimX into item 1 of it
if item 2 of it < minLimY then put minLimY into item 2 of it
if item 1 of it > maxLimX then put maxLimX into item 1 of it
if item 2 of it > maxLimY then put maxLimY into item 2 of it

put item 1 of it + slopX into item 3 of newRect
put item 2 of it + slopY into item 4 of newRect
set the rect of me to newRect
end repeat
else
put item 1 of origPt - the left of me into minLimX
put item 2 of origPt - the top of me into minLimY
put width of card window - width of me + minLimX into maxLimX
put top of bg btn "Pick a file" - height of me + minLimY into maxLimY

repeat while the mouse is down
get the mouseLoc

if item 1 of it < minLimX then put minLimX into item 1 of it
if item 2 of it < minLimY then put minLimY into item 2 of it
if item 1 of it > maxLimX then put maxLimX into item 1 of it
if item 2 of it > maxLimY then put maxLimY into item 2 of it

put item 1 of it - item 1 of origPt into slopX
put item 2 of it - item 2 of origPt into slopY

put origRect into myRect
add slopX to item 1 of myRect
add slopX to item 3 of myRect
add slopY to item 2 of myRect
add slopY to item 4 of myRect

set the rect of me to myRect
end repeat

put myRect into newRect
end if

set the rect of me to newRect
end mouseDown

</script>
    </part>
    <part>
        <id>11</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>327</left>
            <top>346</top>
            <right>435</right>
            <bottom>363</bottom>
        </rect>
        <style>checkbox</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <name>clip it</name>
        <script>on mouseUp
end mouseUp</script>
    </part>
    <part>
        <id>16</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>196</left>
            <top>326</top>
            <right>297</right>
            <bottom>341</bottom>
        </rect>
        <style>checkbox</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Bounds Only</name>
        <script></script>
    </part>
    <part>
        <id>17</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>441</left>
            <top>331</top>
            <right>573</right>
            <bottom>351</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>bounds</name>
        <script></script>
    </part>
    <part>
        <id>18</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>429</left>
            <top>316</top>
            <right>537</right>
            <bottom>331</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <name>Rect of Drawn Pict:</name>
        <script>on mouseUp
end mouseUp</script>
    </part>
    <content>
        <layer>background</layer>
        <id>2</id>
        <text>Your Volume:Your Folder:Your File</text>
    </content>
    <content>
        <layer>background</layer>
        <id>4</id>
        <text>DisplayPict</text>
    </content>
    <name>DisplayPict</name>
    <script>on primeCard
set hilite of cd btn "bounds Only" to false
set hilite of cd btn thumbnail to false

set hilite of cd btn "topLeft of btn here" to true
set hilite of cd btn "rect of btn there" to false
set hilite of cd btn "clip it" to false
hide cd btn "clip it"

put empty into cd field bounds

pass primeCard
end primeCard
</script>
</card>


card_4547.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<card>
    <id>4547</id>
    <filler1>0</filler1>
    <bitmap>BMAP_4717.pbm</bitmap>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <owner>4201</owner>
    <link rel="stylesheet" type="text/css" href="stylesheet_3177.css" />
    <part>
        <id>1</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>8</left>
            <top>364</top>
            <right>269</right>
            <bottom>385</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>versions</name>
        <script></script>
    </part>
    <part>
        <id>3</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>126</left>
            <top>52</top>
            <right>570</right>
            <bottom>355</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name></name>
        <script></script>
    </part>
    <part>
        <id>4</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>534</left>
            <top>355</top>
            <right>566</right>
            <bottom>384</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>26425</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name></name>
        <script>on mouseUp
go next card
end mouseUp</script>
    </part>
    <part>
        <id>5</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>498</left>
            <top>355</top>
            <right>532</right>
            <bottom>384</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>902</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name></name>
        <script>on mouseUp
go prev card
end mouseUp</script>
    </part>
    <content>
        <layer>card</layer>
        <id>1</id>
        <text>QTPict: Tue, Jun 2, 1992 4:00:43 PM</text>
    </content>
    <content>
        <layer>card</layer>
        <id>3</id>
        <text>QTPict with no params will return empty in the result if QuickTime is present or Error message if QuickTime is not present.

QTPict DisplayPict,name,location,source [,options]
   name - file or resource name
   location - point or rect (if rect, pict will be scaled)
   source - "file" or "resource"
   options - "thumbnail" and/or "clipTo",rect
"the result" after DisplayPict has rect where pict was drawn (or Error msg)
QTPict PictBounds - with same params as above returns rect but doesn't draw pict

QTPict CodecNames
QTPict CodeTypes

QTPict CompressPict, name, source, quality, codec
  ex: QTPict CompressPict,MyPict,resource,512,jpeg

QTPict PictRsrcToFile, name
QTPict PictFileToRsrc, fileName [,resourceName]

QTPict GetScreenDepth
QTPict FileSize,fileName

QTPict ClipTo, rect -- see "Logo" handler in stack script
QTPict DiffClip, rect
QTPict UnionClip, rect
 (check "the result" for DisplayPict,CodecNames,CodeTypes,GetScreenDepth,FileSize)</text>
    </content>
    <name>QTPict</name>
    <script></script>
</card>